beginterrainscript; 

variables;
short rctx,rcty,terr_typ;

body;

beginstate INIT_STATE;
	break;

beginstate START_STATE;
break;

beginstate STEP_INTO_SPOT_STATE;

	rctx = 10;
	while(rctx <= 22){
		rcty = 10;
		while(rcty <= 22){
			terr_typ = get_terrain(rctx,rcty);
			if((terr_typ >= 175) && (terr_typ <= 177))
				set_terrain(rctx,rcty,get_ran(1,175,177));
			move_item_on_spot(rctx,rcty,-1,-1);

			rcty = (rcty + 1);
		}

		rctx = (rctx + 1);
	}
	force_instant_terrain_redraw();

break;
